home *** CD-ROM | disk | FTP | other *** search
/ PC World 1999 April / PCWorld_1999-04_cd.bin / Software / TemaCD / Taran / _SETUP.1 / Rozednìní (Javascript).htt < prev    next >
Text File  |  1997-09-04  |  2KB  |  75 lines
  1. <!-- Tato strßnka byla vytvorena programem TARANTULE 1.0 -->
  2. <!-- ktery najdete na http://www.tarantule.cz -->
  3. <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2 Final//EN">
  4.  
  5. <HTML>
  6. <HEAD>
  7.     <TITLE></TITLE>
  8.  
  9. <script language="JavaScript">
  10. <!--
  11. /*************************************************************
  12.  * fade script ver0.1 by Kouichirou@Eto.com 1996/02/20
  13.  * Copyright (c) 1996 Kouichirou Eto. All Rights Reserved.
  14.  * You can freely copy, use, modify this script,
  15.  * if the credit is given in the source.
  16.  */
  17.  
  18. function makearray(n) {
  19.     this.length = n;
  20.     for(var i = 1; i <= n; i++)
  21.         this[i] = 0;
  22.     return this;
  23. }
  24.  
  25. hexa = new makearray(16);
  26. for(var i = 0; i < 10; i++)
  27.     hexa[i] = i;
  28. hexa[10]="a"; hexa[11]="b"; hexa[12]="c";
  29. hexa[13]="d"; hexa[14]="e"; hexa[15]="f";
  30.  
  31. function hex(i) {
  32.     if (i < 0)
  33.         return "00";
  34.     else if (i > 255)
  35.         return "ff";
  36.     else
  37.         return "" + hexa[Math.floor(i/16)] + hexa[i%16];
  38. }
  39.  
  40. function setbgColor(r, g, b) {
  41.     var hr = hex(r); var hg = hex(g); var hb = hex(b);
  42.     document.bgColor = "#"+hr+hg+hb;
  43. }
  44.  
  45. function fade(sr, sg, sb, er, eg, eb, step) {
  46.     for(var i = 0; i <= step; i++) {
  47.         setbgColor(
  48.         Math.floor(sr * ((step-i)/step) + er * (i/step)),
  49.         Math.floor(sg * ((step-i)/step) + eg * (i/step)),
  50.         Math.floor(sb * ((step-i)/step) + eb * (i/step)));
  51.     }
  52. }
  53.  
  54. function fadein() {
  55.     fade(0,0,0,255,255,255,50);
  56. }
  57.  
  58. /* do fadein */
  59. fadein();
  60. //-->
  61. </script>
  62.     
  63.     
  64. </HEAD>
  65.  
  66. <BODY>
  67.  
  68.  
  69.  
  70.  
  71.  
  72.  
  73. </BODY>
  74. </HTML>
  75.